[NAGWare Gateway Generator] Copyright (c) 1993 by the Numerical Algorithms Group Ltd g
epslon real ya (n) real yb (n) real bc (n) real n integer [bc] = g(epslon,ya,yb,n) function [bc] = g(epslon,ya,yb,n)